position of plane

cone

plane

β = 90°           →   circle
α < β < 90°    →   ellipse
β = α              →    parabola
0 ≤ β < α        →   hyperbola

PARABOLA

HYPERBOLA

ELLIPSE

CIRCLE

PAIR OF STRAIGHT LINES

α = 0.7853981633974483 rad (slider from 0 to 6.283185307179586, step 0.08726646259971647)
a = InfiniteCone((0, 0, 0), (0, 0, 1), α)
h = 4.8 (slider from -8 to 8, step 0.1)
A: (0, 0, h)
β = 0.7853981633974483 rad (slider from 0 to 90*°, step 0.08726646259971647)
c = Line((0, 0, 0), (0, sin(β), cos(β)))
e = Line(A, c)
b = Line(A, (1, 0, h))
d = Plane(b, e)
f = IntersectPath(d, a)
g = true
i = true
B = (-6.6, -2)
text2: "" + text1 + ""